Limacon Linkage

Move generator point G

Locus

Mechanism

A = Point(a)
B = Point(a)
b = Segment(A, B)
C = Point(b)
c = Circle(A, C)
G = Point(c)
d = Segment(G, A)
e = LineBisector(G, B)
A' = Mirror(A, e)
f = Segment(B, A')
g = Segment(A', G)
k = 3 (slider from 0 to 5, step 0.01)
B' = Dilate(B, k, A')
h = Segment(B, B')
p = Circle(A', B)
E = Intersect(p, g, 1)
i = LineBisector(E, B')
A'' = Mirror(A', i)
j = Segment(B', A'')
l = Segment(A'', E)
loc1 = Locus(A'', G)
m = false
n = false